# -*- mode: snippet -*-
# name: shiny ui dateRangeInput
# key: shiny.ui.dateRangeInput
# key: shiny_ui_dateRangeInput
# key: dateRangeInput_shiny_ui
# contributor: Shuguang Sun
# --
dateRangeInput(
  inputId = "${1:id}",
  label   = h4("${2:label}"),
  label   = h4("Date Range"),
  start   = min(processed_data_tbl$order.date),
  end     = max(processed_data_tbl$order.date),
  min     = min(processed_data_tbl$order.date),
  max     = max(processed_data_tbl$order.date),
  startview = "month")